home *** CD-ROM | disk | FTP | other *** search
/ Ah My Goddess / Ah My Goddess.iso / pc / stage / skt1024.dxr / 00017.ls < prev    next >
Encoding:
Text File  |  1997-09-08  |  593 b   |  15 lines
  1. on timeset
  2.   global gvsktwhour, gvsktwmin, gvsktwsec, gvsktwhourl, gvsktwminl, gvsktwsecl, gvskthenipointx, gvskthenipointy, gvsktwpointx, gvsktwpointy, gvsktwbpointx, gvsktwbpointy
  3.   set lvtimestring to the long time
  4.   set the itemDelimiter to ":"
  5.   set gvsktwhour to value(item 1 of lvtimestring)
  6.   set gvsktwmin to value(item 2 of lvtimestring)
  7.   set gvsktwsec to value(item 3 of lvtimestring)
  8.   set gvsktwhour to (gvsktwhour mod 12) + (gvsktwmin / 60.0)
  9.   set gvsktwpointx to 115 + the left of sprite 2
  10.   set gvsktwpointy to 189 + the top of sprite 2
  11.   sethour()
  12.   setmin()
  13.   setsec()
  14. end
  15.